(compilation-handle-exit): Quote first argument of `run-hook-with-args'.

diff --git a/lisp/progmodes/compile.el b/lisp/progmodes/compile.el
index 23e4f176fee5a7a2f41c4330e5e7a5814996308f..d3e8ec85d05c099ba1c0f63684b106eb4efe94bb 100644 (file)
--- a/lisp/progmodes/compile.el
+++ b/lisp/progmodes/compile.el
@@ -1448,7 +1448,7 @@ Turning the mode on runs the normal hook `compilation-minor-mode-hook'."
     (with-no-warnings
       (if compilation-finish-function
          (funcall compilation-finish-function (current-buffer) msg)))
-    (run-hook-with-args compilation-finish-functions (current-buffer) msg)))
+    (run-hook-with-args 'compilation-finish-functions (current-buffer) msg)))
 
 ;; Called when compilation process changes state.
 (defun compilation-sentinel (proc msg)